home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Mission to McDonaldLand
/
Mission To McDonaldLand.iso
/
code.cst
/
00031_Script_NO FLOOR
< prev
next >
Wrap
Text File
|
1998-10-29
|
4KB
|
119 lines
on enterFrame
global heading
global move
global updown
global silly
global silly2
global nomore
global CStop
global restoration
global castrestore
if CStop = 1 then
if the mouseH < the locH of sprite 30 then set the member of sprite 30 = "Walk Left"
if the mouseH > the locH of sprite 30 then set the member of sprite 30 = "Walk Right"
abort
end if
if silly > 0 then abort
if silly2 > 0 then abort
if the mouseH > the locH of sprite 30 - 20 and the mouseH < the locH of sprite 30 + 20 then set move = 0
if the mouseH > the locH of sprite 30 + 19 then
set the member of sprite 30 = "Walk Right"
set heading = 2
set move = 1
set the locH of sprite 30 = the locH of sprite 30 + 15
end if
if the mouseH < the locH of sprite 30 - 19 then
set the member of sprite 30 = "Walk Left"
set heading = 1
set move = 1
set the locH of sprite 30 = the locH of sprite 30 - 15
end if
if the mouseV > the locV of sprite 30 and the mouseV < the locV of sprite 30 + 50 then set updown = 0
if the mouseV < the locV of sprite 30 then
if the locV of sprite 30 > 100 then
if move = 0 and heading = 1 then set the member of sprite 30 = "Walk Left"
if move = 0 and heading = 2 then set the member of sprite 30 = "Walk Right"
set the locV of sprite 30 = the locV of sprite 30 - 8
set updown = 1
end if
end if
if the mouseV > the locV of sprite 30 + 50 then
if the locV of sprite 30 < 350 then
if move = 0 and heading = 1 then set the member of sprite 30 = "Walk Left"
if move = 0 and heading = 2 then set the member of sprite 30 = "Walk Right"
set the locV of sprite 30 = the locV of sprite 30 + 8
set updown = 1
end if
end if
if the locH of sprite 30 > 550 then set the locH of sprite 30 = 550
if the locH of sprite 30 < 100 then set the locH of sprite 30 = 100
end
on rightMouseDown
global silly
global silly2
global heading
global CStop
if CStop = 1 then abort
if the mouseH > the locH of sprite 30 - 60 and the mouseH < the locH of sprite 30 + 60 and silly < 1 then
if heading = 1 then
set the locH of sprite 30 = the locH of sprite 30 + 16
set the locV of sprite 30 = the locV of sprite 30 - 14
set the member of sprite 30 = "backflipL"
end if
if heading = 2 then
set the locH of sprite 30 = the locH of sprite 30 - 16
set the locV of sprite 30 = the locV of sprite 30 - 14
set the member of sprite 30 = "backflipR"
end if
set silly = 1
end if
if silly2 < 1 and (the mouseH < the locH of sprite 30 - 60 or the mouseH > the locH of sprite 30 + 60) then
if the locH of sprite 30 > 200 or heading = 2 then
set silly2 = 1
set the locV of sprite 30 = the locV of sprite 30 - 15
if heading = 2 then set the member of sprite 30 = "cartwheelR"
if heading = 1 then set the member of sprite 30 = "cartwheelL"
end if
end if
end
on exitFrame
global silly
global silly2
global heading
if silly > 0 then set silly = silly + 1
if silly > 12 then
set silly = 0
if heading = 1 then set the locH of sprite 30 = the locH of sprite 30 + 50
if heading = 2 then set the locH of sprite 30 = the locH of sprite 30 - 50
set the locV of sprite 30 = the locV of sprite 30 + 14
end if
if silly2 > 0 then
if heading = 2 then set the locH of sprite 30 = the locH of sprite 30 + 20
if heading = 1 then set the locH of sprite 30 = the locH of sprite 30 - 20
set silly2 = silly2 + 1
end if
if silly2 > 10 then
set silly2 = 0
set the locV of sprite 30 = the locV of sprite 30 + 15
end if
go the frame
end